CAAIlluminatedFraction_UranusMagnitudeMuller <-
function(r, Delta){
.Call("CAAIlluminatedFraction_UranusMagnitudeMuller", r, Delta)
}
